home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1997 January / Macworld (1997-01).dmg / Shareware World / Fonts / Metafont / Inputs / ztest0.mf < prev   
Text File  |  1994-08-19  |  334b  |  14 lines
  1. % try all characters on TEST0.MF using the parameters of an unknown font
  2. if unknown cmbase: input cmbase fi % omit if CMMF can be assumed
  3. mode_setup;
  4.  
  5. def generate suffix t= enddef;
  6. input z; font_setup;
  7.  
  8. let echar=endchar;
  9. def endchar= echar; stop "done with char "&decimal charcode&". " enddef;
  10. let iff=always_iff;
  11.  
  12. input test0;
  13. end
  14.